From 659402de58ddfdaecf4a3d3a91c3943530dc8940 Mon Sep 17 00:00:00 2001
From: parkrrrr <parkrrrr@f51c46e8-681c-474f-0cfe-069cfd0219fb>
Date: Tue, 29 Mar 2005 15:05:45 +0000
Subject: [PATCH] Added file type

---
 gpsbabel/intdoc/SA2003_an1_dump.pl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/gpsbabel/intdoc/SA2003_an1_dump.pl b/gpsbabel/intdoc/SA2003_an1_dump.pl
index 10ec33f78..5bbb690d1 100644
--- a/gpsbabel/intdoc/SA2003_an1_dump.pl
+++ b/gpsbabel/intdoc/SA2003_an1_dump.pl
@@ -60,11 +60,14 @@ sub decodeGuid {
 undef $/;
 $file = <>;
 
+@filetypes = qw( drawing road trail waypoint track );
+
 # read file header
-($magic, $unk1 ) = shiftunpack( 'ss' );
+($magic, $filetype ) = shiftunpack( 'ss' );
 
 print <<END;
 MAGIC   $magic
+$filetypes[$filetype] layer
 
 END
 
-- 
2.30.2